home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Me-Mz / MealPlan.cpt / Meal Planner / card_2891.txt < prev    next >
Text File  |  1988-04-11  |  8KB  |  353 lines

  1. -- card: 2891 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 4000
  4. -- background id: 2709
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on opencard
  8.   hide bkgnd button "Delete"
  9. end opencard
  10.  
  11. on closecard
  12.   show bkgnd button "delete"
  13. end closecard
  14.  
  15.  
  16.  
  17. -- part 17 (field)
  18. -- low flags: 80
  19. -- high flags: 0001
  20. -- rect: left=50 top=228 right=331 bottom=125
  21. -- title width / last selected line: 0
  22. -- icon id / first selected line: 0 / 0
  23. -- text alignment: 0
  24. -- font id: 3
  25. -- text size: 9
  26. -- style flags: 8192
  27. -- line height: 10
  28. -- part name: sortHelp
  29.  
  30.  
  31. -- part 18 (field)
  32. -- low flags: 80
  33. -- high flags: 0001
  34. -- rect: left=276 top=0 right=23 bottom=445
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 0 / 0
  37. -- text alignment: 0
  38. -- font id: 3
  39. -- text size: 9
  40. -- style flags: 8192
  41. -- line height: 10
  42. -- part name: AddHelp
  43.  
  44.  
  45. -- part 19 (field)
  46. -- low flags: 81
  47. -- high flags: 0001
  48. -- rect: left=8 top=6 right=308 bottom=137
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 0
  52. -- font id: 3
  53. -- text size: 9
  54. -- style flags: 0
  55. -- line height: 12
  56. -- part name: help
  57. ----- HyperTalk script -----
  58. on mouseup
  59.   set visible of card field help to not the visible of card field help
  60. end mouseup
  61.  
  62.  
  63. -- part 20 (button)
  64. -- low flags: 00
  65. -- high flags: 2000
  66. -- rect: left=6 top=300 right=342 bottom=45
  67. -- title width / last selected line: 0
  68. -- icon id / first selected line: 2507 / 2507
  69. -- text alignment: 1
  70. -- font id: 0
  71. -- text size: 12
  72. -- style flags: 0
  73. -- line height: 16
  74. -- part name: Help
  75. ----- HyperTalk script -----
  76. on mouseUp
  77.   show card field "help"
  78. end mouseUp
  79.  
  80.  
  81.  
  82. -- part 21 (field)
  83. -- low flags: 80
  84. -- high flags: 0001
  85. -- rect: left=31 top=0 right=23 bottom=183
  86. -- title width / last selected line: 0
  87. -- icon id / first selected line: 0 / 0
  88. -- text alignment: 0
  89. -- font id: 3
  90. -- text size: 9
  91. -- style flags: 8192
  92. -- line height: 10
  93. -- part name: findHelp
  94.  
  95.  
  96. -- part 22 (field)
  97. -- low flags: 80
  98. -- high flags: 0001
  99. -- rect: left=284 top=4 right=35 bottom=391
  100. -- title width / last selected line: 0
  101. -- icon id / first selected line: 0 / 0
  102. -- text alignment: 0
  103. -- font id: 3
  104. -- text size: 9
  105. -- style flags: 8192
  106. -- line height: 10
  107. -- part name: moveHelp
  108.  
  109.  
  110. -- part 23 (field)
  111. -- low flags: 80
  112. -- high flags: 0001
  113. -- rect: left=396 top=140 right=245 bottom=476
  114. -- title width / last selected line: 0
  115. -- icon id / first selected line: 0 / 0
  116. -- text alignment: 0
  117. -- font id: 3
  118. -- text size: 9
  119. -- style flags: 8192
  120. -- line height: 10
  121. -- part name: newHelp
  122.  
  123.  
  124. -- part 25 (field)
  125. -- low flags: 80
  126. -- high flags: 0001
  127. -- rect: left=410 top=24 right=68 bottom=487
  128. -- title width / last selected line: 0
  129. -- icon id / first selected line: 0 / 0
  130. -- text alignment: 0
  131. -- font id: 3
  132. -- text size: 9
  133. -- style flags: 8192
  134. -- line height: 10
  135. -- part name: goWeekHelp
  136.  
  137.  
  138. -- part 26 (field)
  139. -- low flags: 80
  140. -- high flags: 0001
  141. -- rect: left=359 top=250 right=292 bottom=479
  142. -- title width / last selected line: 0
  143. -- icon id / first selected line: 0 / 0
  144. -- text alignment: 0
  145. -- font id: 3
  146. -- text size: 9
  147. -- style flags: 8192
  148. -- line height: 10
  149. -- part name: printHelp
  150.  
  151.  
  152. -- part 27 (button)
  153. -- low flags: 00
  154. -- high flags: 0000
  155. -- rect: left=110 top=33 right=75 bottom=128
  156. -- title width / last selected line: 0
  157. -- icon id / first selected line: 0 / 0
  158. -- text alignment: 1
  159. -- font id: 0
  160. -- text size: 12
  161. -- style flags: 0
  162. -- line height: 16
  163. -- part name: milk
  164. ----- HyperTalk script -----
  165. on mouseUp
  166.   beep
  167.   show card field "milk"
  168.   wait 2 seconds
  169.   hide card field "milk"
  170. end mouseUp
  171.  
  172.  
  173.  
  174. -- part 28 (field)
  175. -- low flags: 80
  176. -- high flags: 0001
  177. -- rect: left=3 top=40 right=59 bottom=108
  178. -- title width / last selected line: 0
  179. -- icon id / first selected line: 0 / 0
  180. -- text alignment: 1
  181. -- font id: 3
  182. -- text size: 12
  183. -- style flags: 0
  184. -- line height: 16
  185. -- part name: Milk
  186.  
  187.  
  188. -- part 29 (button)
  189. -- low flags: 00
  190. -- high flags: 0000
  191. -- rect: left=44 top=316 right=342 bottom=67
  192. -- title width / last selected line: 0
  193. -- icon id / first selected line: 21700 / 21700
  194. -- text alignment: 1
  195. -- font id: 0
  196. -- text size: 12
  197. -- style flags: 0
  198. -- line height: 16
  199. -- part name: New Button
  200. ----- HyperTalk script -----
  201. on mouseUp
  202.   go home
  203. end mouseUp
  204.  
  205.  
  206.  
  207. -- part 32 (field)
  208. -- low flags: 81
  209. -- high flags: 2001
  210. -- rect: left=148 top=23 right=277 bottom=485
  211. -- title width / last selected line: 0
  212. -- icon id / first selected line: 0 / 0
  213. -- text alignment: 1
  214. -- font id: 3
  215. -- text size: 12
  216. -- style flags: 0
  217. -- line height: 16
  218. -- part name: myMessage
  219. ----- HyperTalk script -----
  220. on mouseup
  221.   global staydown
  222.   put "hideIt" into stayDown
  223.  
  224.   set visible of card field mymessage to not the visible of card field mymessage
  225.  
  226.   set visible of card field copyright to not the visible of card field copyright
  227. end mouseup
  228.  
  229.  
  230.  
  231. -- part 33 (field)
  232. -- low flags: 81
  233. -- high flags: 0001
  234. -- rect: left=154 top=237 right=274 bottom=477
  235. -- title width / last selected line: 0
  236. -- icon id / first selected line: 0 / 0
  237. -- text alignment: 1
  238. -- font id: 3
  239. -- text size: 9
  240. -- style flags: 512
  241. -- line height: 12
  242. -- part name: copyright
  243.  
  244.  
  245. -- part contents for background part 6
  246. ----- text -----
  247. ingredients
  248.  
  249. -- part contents for background part 7
  250. ----- text -----
  251.  cooking instructions
  252.  
  253.  
  254.  
  255.  
  256.  
  257.  
  258.  
  259.  
  260.  
  261.  
  262.  
  263. you can use this card
  264. but you can't delete it
  265.  
  266. -- part contents for background part 10
  267. ----- text -----
  268.  
  269. 3 eggs
  270. apples
  271.  
  272. -- part contents for background part 8
  273. ----- text -----
  274. Category
  275.  
  276. -- part contents for background part 9
  277. ----- text -----
  278. Type
  279.  
  280. -- part contents for background part 5
  281. ----- text -----
  282. Dish
  283.  
  284. -- part contents for card part 17
  285. ----- text -----
  286. When you click on this button a dialog box will ask you how you want to sort your cards.  Click on the button of your choice.  Type command-period to avoid a sort...
  287.  
  288. -- part contents for card part 18
  289. ----- text -----
  290. This button will add  this card to "This Week's Meals".  Be sure to remove old cards first...
  291.  
  292.  
  293. -- part contents for card part 19
  294. ----- text -----
  295. Store your receipes in this stack.  Use the buttons to find, sort or print information.
  296.  
  297. Add cards to This Weeks Meals with a click of a button, but be sure to remove old cards first.
  298.  
  299. If you want help with any button, hold down the option key then click the button.  Let go of the option key and the message will go away.  
  300. The buttons work normally without the option key down.
  301.  
  302. Click on this message to hide it.
  303.  
  304. -- part contents for card part 21
  305. ----- text -----
  306. This button will help you find anything that you have typed into a card...
  307.  
  308. -- part contents for card part 22
  309. ----- text -----
  310. These buttons will move  you to either the previous or next card in this stack...
  311.  
  312.  
  313. -- part contents for card part 23
  314. ----- text -----
  315. This button will create a new card, right after this one, with the Category & Type  copied from this card.  You can change them if you want, just double click and type over them...
  316.  
  317. -- part contents for card part 25
  318. ----- text -----
  319.  
  320. this button will take you to the stack This Week's Meals...
  321.  
  322. -- part contents for card part 26
  323. ----- text -----
  324. This button will print whatever card it is on.  Just one card on one page.  To print all the cards use the menu command...
  325.  
  326. -- part contents for card part 28
  327. ----- text -----
  328. Drink Your Milk!
  329.  
  330. -- part contents for card part 32
  331. ----- text -----
  332.  
  333. "Meal Planner" & "This Week's Meals" 
  334. are free to anyone who wishes to use them.  
  335. I would appreciate any comments or suggestions for improvements.
  336.  
  337. Peter Martori
  338. 605 W. Montebello
  339. Phoenix, AZ 85013
  340.  
  341. P. Martori on GEnie
  342. 72437,3146 on Compuserve
  343.  
  344.  
  345.  
  346.  
  347.  
  348. -- part contents for card part 33
  349. ----- text -----
  350. (click on this message to hide it)
  351.  
  352. Copyright Peter C. Martori 1988  All rights reserved
  353.